OS. VB.NetでのOpenSTAADの開始

注記: この例では、STAAD.Proでモデルを開いておく必要があります。そうしないと、コードからエラーが返されます。

Form1にボタンを追加し、そのクリックイベントを追加します。
「Dim mStaadObj As Object」と入力し、mStaadObjをオブジェクトとして宣言します。
「mStaadObj = GetObject(, "StaadPro.OpenSTAAD")」と入力し、<Enter>キーを押します。これにより、OpenSTAADが開始され、プログラムの現在のSTAAD.Proモデルに接続されます。

この時点で、プログラムは次のようになります。

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim mStaadObj As Object
        
        mStaadObj = GetObject(, "StaadPro.OpenSTAAD")
        
    End Sub
End Class